﻿Public Class ActualItem
    Property Model() As String
    Property Duration() As Integer
    Property TimeToChange() As Integer
    Property Status() As String

    Public Sub New(ByVal mo As String, ByVal dur As Integer, ByVal ttc As Integer, ByVal stt As String)
        Model = mo
        Duration = dur
        TimeToChange = ttc
        Status = stt
    End Sub
End Class
